Comment change.

diff --git a/lisp/window.el b/lisp/window.el
index 2b5a4ab161d3c0b2f5ce8a9f9fb7a62f00560a28..188b3acf311d7619302de8ed5dd76c6f718e53fa 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -36,6 +36,9 @@ of this construct.
 However, if a window has become dead, don't get an error,
 just refrain from reselecting it."
   `(let ((save-selected-window-window (selected-window))
+        ;; It is necessary to save all of these, because calling
+        ;; select-window changes frame-selected-window for whatever
+        ;; frame that window is in.
         (save-selected-window-alist
          (mapcar (lambda (frame) (list frame (frame-selected-window frame)))
                  (frame-list))))